home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Belgian Amiga Club - ADF Collection
/
BS1 part 57.zip
/
BS1 part 57
/
Pro-net personal v2.0 d1.adf
/
merge
< prev
next >
Wrap
Text File
|
1989-12-14
|
4KB
|
90 lines
. MERGE
.KEY SRC,DEST
version 99.99
if warn
failat 31
lab MOUNT1
mount Rad: FROM PRO-NET_P:MountListForRad
relabel Rad: MyRad
diskchange Rad:
if warn
ask "Not enough memory for RAD:, use slow installation method?(Y/N)"
if not warn
skip MOUNT1 back
endif
endif
echo "If you are using RAD in memory, its contents will be erased."
ask "OK to erase? Press Y if unsure.(Y/N)"
if not warn
skip NoRad
endif
ECHO " "
ECHO "Please insert library disk in <SRC>"
diskcopy <SRC> to Rad: NAME MyRad
IF EXISTS <DEST>PRO-NET_P/PRO-NET_P
RAM:MERGELIB Rad:PNDIR/TTL <DEST>PRO-NET_P/PNDIR/TTL
RAM:MERGELIB Rad:PNDIR/MTTL <DEST>PRO-NET_P/PNDIR/MTTL
RAM:MERGELIB Rad:PNDIR/VLSI <DEST>PRO-NET_P/PNDIR/VLSI
RAM:MERGELIB Rad:PNDIR/ECL <DEST>PRO-NET_P/PNDIR/ECL
RAM:MERGELIB Rad:PNDIR/Analog <DEST>PRO-NET_P/PNDIR/Analog
RAM:MERGELIB Rad:PNDIR/Discrete <DEST>PRO-NET_P/PNDIR/Discrete
RAM:MERGELIB Rad:PNDIR/user <DEST>PRO-NET_P/PNDIR/User
RAM:MERGELIB Rad:PNDIR/schem <DEST>PRO-NET_P/PNDIR/schem
RAM:MERGELIB Rad:PNDIR/Symbol <DEST>PRO-NET_P/PNDIR/Symbol
RAM:MERGELIB Rad:PNDIR/MOS <DEST>PRO-NET_P/PNDIR/MOS
ELSE
RAM:MERGELIB Rad:PNDIR/TTL <DEST>PNDIR/TTL
RAM:MERGELIB Rad:PNDIR/MTTL <DEST>PNDIR/MTTL
RAM:MERGELIB Rad:PNDIR/VLSI <DEST>PNDIR/VLSI
RAM:MERGELIB Rad:PNDIR/ECL <DEST>PNDIR/ECL
RAM:MERGELIB Rad:PNDIR/Analog <DEST>PNDIR/Analog
RAM:MERGELIB Rad:PNDIR/Discrete <DEST>PNDIR/Discrete
RAM:MERGELIB Rad:PNDIR/user <DEST>PNDIR/User
RAM:MERGELIB Rad:PNDIR/schem <DEST>PNDIR/schem
RAM:MERGELIB Rad:PNDIR/Symbol <DEST>PNDIR/Symbol
RAM:MERGELIB Rad:PNDIR/MOS <DEST>PNDIR/MOS
ENDIF
echo " "
echo " "
echo "If you don't have any more Libraries Disk(s) to be installed/merged,"
echo "Please remove RAD by typing REMRAD, then Reboot the system."
skip ENDMERGE
endif
lab NoRad
ECHO " "
ECHO "Please insert library disk in <SRC>"
ASK "Are you ready (Y/N)?"
IF WARN
IF EXISTS <DEST>PRO-NET_P/PRO-NET_P
RAM:MERGELIB <SRC>PNDIR/TTL <DEST>PRO-NET_P/PNDIR/TTL
RAM:MERGELIB <SRC>PNDIR/MTTL <DEST>PRO-NET_P/PNDIR/MTTL
RAM:MERGELIB <SRC>PNDIR/VLSI <DEST>PRO-NET_P/PNDIR/VLSI
RAM:MERGELIB <SRC>PNDIR/ECL <DEST>PRO-NET_P/PNDIR/ECL
RAM:MERGELIB <SRC>PNDIR/Analog <DEST>PRO-NET_P/PNDIR/Analog
RAM:MERGELIB <SRC>PNDIR/Discrete <DEST>PRO-NET_P/PNDIR/Discrete
RAM:MERGELIB <SRC>PNDIR/user <DEST>PRO-NET_P/PNDIR/User
RAM:MERGELIB <SRC>PNDIR/schem <DEST>PRO-NET_P/PNDIR/schem
RAM:MERGELIB <SRC>PNDIR/Symbol <DEST>PRO-NET_P/PNDIR/Symbol
RAM:MERGELIB <SRC>PNDIR/MOS <DEST>PRO-NET_P/PNDIR/MOS
ELSE
RAM:MERGELIB <SRC>PNDIR/TTL <DEST>PNDIR/TTL
RAM:MERGELIB <SRC>PNDIR/MTTL <DEST>PNDIR/MTTL
RAM:MERGELIB <SRC>PNDIR/VLSI <DEST>PNDIR/VLSI
RAM:MERGELIB <SRC>PNDIR/ECL <DEST>PNDIR/ECL
RAM:MERGELIB <SRC>PNDIR/Analog <DEST>PNDIR/Analog
RAM:MERGELIB <SRC>PNDIR/Discrete <DEST>PNDIR/Discrete
RAM:MERGELIB <SRC>PNDIR/user <DEST>PNDIR/User
RAM:MERGELIB <SRC>PNDIR/schem <DEST>PNDIR/schem
RAM:MERGELIB <SRC>PNDIR/Symbol <DEST>PNDIR/Symbol
RAM:MERGELIB <SRC>PNDIR/MOS <DEST>PNDIR/MOS
ENDIF
ENDIF
LAB ENDMERGE
ECHO " "
ECHO "If you have more library disks to merge, Please enter this command:"
ECHO " "
ECHO "EXECUTE PRO-NET_P:MERGE_LIBRARIES source_drive destination_drive"
ECHO " "
QUIT